program HIS;

uses
  Vcl.Forms,
  ULogin in 'ULogin.pas' {FLogin},
  UMain2 in 'UMain2.pas' {FMain2},
  Vcl.Themes,
  Vcl.Styles,
  UDMPerson in 'UDMPerson.pas' {DMPerson: TDataModule},
  UDMConnection in 'UDMConnection.pas' {FConnection: TDataModule},
  test in 'test.pas' {FTest},
  UAddPerson in 'UAddPerson.pas' {FAddPerson},
  UAddPatient in 'UAddPatient.pas' {FAddPatient},
  UAddPersonell in 'UAddPersonell.pas' {FAddPersonell},
  UNurseList in 'UNurseList.pas' {FNurseList},
  UAddTestType in 'UAddTestType.pas' {FAddTestType},
  UDepartment in 'UDepartment.pas' {FDepartement},
  UDMSettings in 'UDMSettings.pas' {dmSettings: TDataModule},
  UWard in 'UWard.pas' {FWard},
  UAddPersonRole in 'UAddPersonRole.pas' {FAddPersonRole},
  UDMInsurance in 'UDMInsurance.pas' {DMInsurance: TDataModule},
  UInsurance in 'UInsurance.pas' {FInsurance},
  UDMNursing in 'UDMNursing.pas' {DMNursing: TDataModule},
  URooms in 'URooms.pas' {FRooms},
  UADDCareTypeMeasurement in 'UADDCareTypeMeasurement.pas' {FAddCareTypeMesurement},
  UAddDischargeType in 'UAddDischargeType.pas' {FAddDischargeType},
  UAddClassCareInsurance in 'UAddClassCareInsurance.pas' {FAddClassCareInsurance},
  UAssignPatient in 'UAssignPatient.pas' {FAssignPatient},
  UNursingWards in 'UNursingWards.pas' {FNursingWards},
  UDMItems in 'UDMItems.pas' {DMItems: TDataModule},
  UAddItem in 'UAddItem.pas' {FAddItem},
  UAssignCoefToItem in 'UAssignCoefToItem.pas' {FAssignCoefToItem},
  UAssignItemInsurancePricing in 'UAssignItemInsurancePricing.pas' {FAssignItemInusrancePricing},
  UAddLabItems in 'UAddLabItems.pas' {FAddLabItem},
  UDMLab in 'UDMLab.pas' {DMLab: TDataModule},
  ULabTestRequest in 'ULabTestRequest.pas' {FLabTestRequest},
  UTestPricing in 'UTestPricing.pas' {FTestPricing},
  UAddDoctorPerc in 'UAddDoctorPerc.pas' {FAddDoctorPerc},
  UAddCoeff in 'UAddCoeff.pas' {FAddCoef},
  UAddCategory in 'UAddCategory.pas' {FAddCategory},
  UItemInsuranceCoverage in 'UItemInsuranceCoverage.pas' {FItemInsuranceCoverage},
  UCurrencies in 'UCurrencies.pas' {FCurrencies},
  ULabTestResult in 'ULabTestResult.pas' {FLabTestResult},
  UDoctorlist in 'UDoctorlist.pas' {FDoctorList},
  URadiologyTestResult in 'URadiologyTestResult.pas' {FRadiologyTestResult},
  USuppliers in 'USuppliers.pas' {FSuppliers},
  UDMPharmacy in 'UDMPharmacy.pas' {DMPharmacy: TDataModule},
  UPharmacyCategories in 'UPharmacyCategories.pas' {FPharmacyCategories},
  UPharmacySubCat in 'UPharmacySubCat.pas' {FPharmacySubCat},
  UPharmacyLigne in 'UPharmacyLigne.pas' {FPharmacyLigne},
  UPharmacyStockSubNew in 'UPharmacyStockSubNew.pas' {FPharmacyStockSubNew},
  UPharmacyStockTransferRequestSub in 'UPharmacyStockTransferRequestSub.pas' {FPharmacyStockTransferRequestSub},
  UPharmacyReturn in 'UPharmacyReturn.pas' {FPharmacyReturn},
  USupplierInvoice in 'USupplierInvoice.pas' {FSupplierInvoice},
  UPharmacyTransaction in 'UPharmacyTransaction.pas' {FPharmacyTransaction},
  UPharmacyOptions in 'UPharmacyOptions.pas' {FPharmacyOptions},
  UPharmacyInvoice in 'UPharmacyInvoice.pas' {FPharmacyInvoice},
  UPharmacyStock in 'UPharmacyStock.pas' {FPharmacyStock},
  UPharmacyStockTransferSub in 'UPharmacyStockTransferSub.pas' {FPharmacyStockTransferSub},
  UPharmacyEncounter in 'UPharmacyEncounter.pas' {FPharmacyEncounter},
  UPharmacyOrder in 'UPharmacyOrder.pas' {FPharmacyOrder},
  UPharmacyStockCount in 'UPharmacyStockCount.pas' {FPharmacyStockCount},
  UPharmacyOrderSub in 'UPharmacyOrderSub.pas' {FPharmacyOrderSub},
  UPharmacyItemNaming in 'UPharmacyItemNaming.pas' {FPharmacyItemNaming},
  URadiologyRequestSub in 'URadiologyRequestSub.pas' {FRadiologyRequestSub},
  URadiologyRequest in 'URadiologyRequest.pas' {FRadiologyRequest},
  UAssignConsToPatient in 'UAssignConsToPatient.pas' {FAssignConsToPatient},
  UMain in 'UMain.pas' {FMain},
  UPharmacyLocation in 'UPharmacyLocation.pas' {FPharmacyLocation},
  UItemAssignToPatient in 'UItemAssignToPatient.pas' {FItemAssignToPatient},
  UAssignOpToPatient in 'UAssignOpToPatient.pas' {FAssignOpToPatient},
  USplitFormTemplate in 'USplitFormTemplate.pas' {DetailForm},
  UDMInvoice in 'UDMInvoice.pas' {DMInvoice: TDataModule},
  UInvoiceAdd in 'UInvoiceAdd.pas' {FInvoiceAdd};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  TStyleManager.TrySetStyle('Metropolis UI Blue');
  Application.CreateForm(TFConnection, FConnection);
  Application.CreateForm(TFLogin, FLogin);
  Application.CreateForm(TFMain2, FMain2);
  Application.CreateForm(TDMPerson, DMPerson);
  Application.CreateForm(TDMInsurance, DMInsurance);
  Application.CreateForm(TDMNursing, DMNursing);
  Application.CreateForm(TdmSettings, dmSettings);
  Application.CreateForm(TFAddPerson, FAddPerson);
  Application.CreateForm(TFTest, FTest);
  Application.CreateForm(TFAddPerson, FAddPerson);
  Application.CreateForm(TFAddPatient, FAddPatient);
  Application.CreateForm(TFAddPersonell, FAddPersonell);
  Application.CreateForm(TFNurseList, FNurseList);
  Application.CreateForm(TFAddTestType, FAddTestType);
  Application.CreateForm(TFDepartement, FDepartement);
  Application.CreateForm(TFWard, FWard);
  Application.CreateForm(TFAddPersonRole, FAddPersonRole);
  Application.CreateForm(TFInsurance, FInsurance);
  Application.CreateForm(TFRooms, FRooms);
  Application.CreateForm(TFAddCareTypeMesurement, FAddCareTypeMesurement);
  Application.CreateForm(TFAddDischargeType, FAddDischargeType);
  Application.CreateForm(TFAddClassCareInsurance, FAddClassCareInsurance);
  Application.CreateForm(TFAssignPatient, FAssignPatient);
  Application.CreateForm(TFNursingWards, FNursingWards);
  Application.CreateForm(TDMItems, DMItems);
  Application.CreateForm(TFAddItem, FAddItem);
  Application.CreateForm(TFAssignCoefToItem, FAssignCoefToItem);
  Application.CreateForm(TFAssignItemInusrancePricing, FAssignItemInusrancePricing);
  Application.CreateForm(TFAddLabItem, FAddLabItem);
  Application.CreateForm(TDMLab, DMLab);
  Application.CreateForm(TFLabTestRequest, FLabTestRequest);
  Application.CreateForm(TFTestPricing, FTestPricing);
  Application.CreateForm(TFAddDoctorPerc, FAddDoctorPerc);
  Application.CreateForm(TFAddCoef, FAddCoef);
  Application.CreateForm(TFAddCategory, FAddCategory);
  Application.CreateForm(TFItemInsuranceCoverage, FItemInsuranceCoverage);
  Application.CreateForm(TFCurrencies, FCurrencies);
  Application.CreateForm(TFLabTestResult, FLabTestResult);
  Application.CreateForm(TFDoctorList, FDoctorList);
  Application.CreateForm(TFRadiologyTestResult, FRadiologyTestResult);
  Application.CreateForm(TFSuppliers, FSuppliers);
  Application.CreateForm(TDMPharmacy, DMPharmacy);
  Application.CreateForm(TFPharmacyCategories, FPharmacyCategories);
  Application.CreateForm(TFPharmacySubCat, FPharmacySubCat);
  Application.CreateForm(TFPharmacyLigne, FPharmacyLigne);
  Application.CreateForm(TFPharmacyStockSubNew, FPharmacyStockSubNew);
  Application.CreateForm(TFPharmacyInvoice, FPharmacyInvoice);
  Application.CreateForm(TFPharmacyStockTransferRequestSub, FPharmacyStockTransferRequestSub);
  Application.CreateForm(TFPharmacyReturn, FPharmacyReturn);
  Application.CreateForm(TFSupplierInvoice, FSupplierInvoice);
  Application.CreateForm(TFPharmacyTransaction, FPharmacyTransaction);
  Application.CreateForm(TFPharmacyOptions, FPharmacyOptions);
  Application.CreateForm(TFPharmacyInvoice, FPharmacyInvoice);
  Application.CreateForm(TFPharmacyStock, FPharmacyStock);
  Application.CreateForm(TFPharmacyStockTransferSub, FPharmacyStockTransferSub);
  Application.CreateForm(TFPharmacyEncounter, FPharmacyEncounter);
  Application.CreateForm(TFPharmacyOrder, FPharmacyOrder);
  Application.CreateForm(TFPharmacyStockCount, FPharmacyStockCount);
  Application.CreateForm(TFPharmacyOrderSub, FPharmacyOrderSub);
  Application.CreateForm(TFPharmacyItemNaming, FPharmacyItemNaming);
  Application.CreateForm(TFRadiologyRequestSub, FRadiologyRequestSub);
  Application.CreateForm(TFRadiologyRequest, FRadiologyRequest);
  Application.CreateForm(TFAssignConsToPatient, FAssignConsToPatient);
  Application.CreateForm(TFMain, FMain);
  Application.CreateForm(TFPharmacyLocation, FPharmacyLocation);
  Application.CreateForm(TFItemAssignToPatient, FItemAssignToPatient);
  Application.CreateForm(TFAssignOpToPatient, FAssignOpToPatient);
  Application.CreateForm(TDetailForm, DetailForm);
  Application.CreateForm(TDMInvoice, DMInvoice);
  Application.CreateForm(TFInvoiceAdd, FInvoiceAdd);
  Application.Run;
end.
